home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Technotools
/
Technotools (Chestnut CD-ROM)(1993).ISO
/
database
/
do1beta
/
poly.do
< prev
next >
Wrap
Text File
|
1991-07-18
|
360b
|
13 lines
/*
demonstration of BGI drawPoly
*/
#include "bgidef.do"
initGraph(DETECT,0,envSymbol("bgipath"));
outTextXY(100,50,"BGI drawPoly Demonstration");
drawPoly([50,50,100,100,150,150,200,200,150,200,100,250,50,300,50,50]);
fillPoly([300,300,330,330,320,360,310,370,
300,380]);
outTextXY(20,450,"Press any key to continue...");
inkey();
closeGraph();